home *** CD-ROM | disk | FTP | other *** search
/ Ian & Stuart's Australian Mac: Not for Sale / Another.not.for.sale (Australia).iso / fade into you / getting there / Apps / MOO-1.7.6.src / inc / bytecodes.h < prev    next >
Text File  |  1994-11-02  |  2KB  |  52 lines
  1. /******************************************************************************
  2.   Copyright (c) 1992 Xerox Corporation.  All rights reserved.
  3.   Portions of this code were written by Stephen White, aka ghond.
  4.   Use and copying of this software and preparation of derivative works based
  5.   upon this software are permitted.  Any distribution of this software or
  6.   derivative works must comply with all applicable United States export
  7.   control laws.  This software is made available AS IS, and Xerox Corporation
  8.   makes no warranty about the software, its performance or its conformity to
  9.   any specification.  Any person obtaining a copy of this software is requested
  10.   to send their name and post office or electronic mail address to:
  11.     Pavel Curtis
  12.     Xerox PARC
  13.     3333 Coyote Hill Rd.
  14.     Palo Alto, CA 94304
  15.     Pavel@Xerox.Com
  16.  *****************************************************************************/
  17.  
  18. #ifndef Bytecode_h
  19. #define Bytecode_h 1
  20.  
  21. #define FREE_BYTECODES(bc)  myfree((void *) bc.vector, M_BYTECODES)
  22.  
  23. #ifndef __TYPES__
  24. typedef unsigned char Byte;
  25. #endif
  26.  
  27. typedef struct Bytecodes Bytecodes;
  28.  
  29. struct Bytecodes {
  30.   unsigned num_labels;
  31.   Byte numbytes_label;
  32.   Byte numbytes_literal;
  33.   Byte numbytes_fork;
  34.   Byte numbytes_var_name;
  35.   Byte *vector;
  36.   unsigned size;
  37.   unsigned max_stack;
  38. };
  39.  
  40. #endif
  41.  
  42. /* $Log: bytecodes.h,v $
  43.  * Revision 1.3  1992/10/23  23:03:47  pavel
  44.  * Added copyright notice.
  45.  *
  46.  * Revision 1.2  1992/07/27  18:06:35  pjames
  47.  * Changed name of ct_env to var_name and const_env to literal.
  48.  *
  49.  * Revision 1.1  1992/07/20  23:23:12  pavel
  50.  * Initial RCS-controlled version.
  51.  * */
  52.